home *** CD-ROM | disk | FTP | other *** search
/ Die Speccy' 97 / Die Speccy' 97.iso / amiga_system / the_aminet / util / wb / usuum2.lha / U.Suum!2.0 / Uni! < prev    next >
Text File  |  1992-09-02  |  497b  |  24 lines
  1. ;Uni! Revision 2.0 - 1/1995 T.dMan
  2.  
  3. If NOT Exists Sys:Prefs/Env-Archive1
  4.   Makedir Sys:Prefs/Env-Archive1
  5.   Makedir Sys:Prefs/Env-Archive1/Sys
  6. EndIf
  7. If NOT Exists Sys:Prefs/Env-Archive2
  8.   Makedir Sys:Prefs/Env-Archive2
  9.   Makedir Sys:Prefs/Env-Archive2/Sys
  10. EndIf
  11.  
  12. If $TDM eq 1
  13.   Assign ENVARC: Sys:Prefs/Env-Archive1
  14.   Copy >NIL: ENVARC:Sys ENV:Sys
  15. EndIf
  16. If $TDM eq 2
  17.   Assign ENVARC: Sys:Prefs/Env-Archive2
  18.   Copy >NIL: ENVARC:Sys ENV:Sys
  19. EndIf
  20. if $TDM eq 3
  21.   Assign ENVARC: Dismount ;ciao
  22. Endif
  23.  
  24.